home *** CD-ROM | disk | FTP | other *** search
- ┘'<><<>><<>><<>><<>><<>><<>><<>><<>><<>><<>><>
- '<> Orginal author:Neil
- '<> Date created:Tuesday, Jul 15 1997
- '<> File name:database\electric\topic2\script\ID716.Scn
- '<><<>><<>><<>><<>><<>><<>><<>><<>><<>><<>><>
- '<> Author of last modification:
- '<> Date of last Modification:
- '<><<>><<>><<>><<>><<>><<>><<>><<>><<>><<>><>
-
-
-
-
-
- '@Disable Forward
-
-
- @At 151,13
- @AtGraphic 288,7
- @picture 2-3-1a.bmp
- @At 248,75
- #cr#b6.25╫10#f518#f1 electrons = 1 coulomb#b
-
- @At 229,11
- #bCharge is measured in coulombs, C#b.
-
- @PlaySoundFile Abb20a01.wav
-
- @Animation FranklinRaiseKey,FranklinWaveKey,FranklinWaveKey,FranklinWaveKey,FranklinLowerKey
- @wait 1
- @Animation FranklinGetGlasses,FranklinMoveGlasses,FranklinLeaveGlasses
- @Wait 1
- @Animation FranklinLightning
-
- @Waitforsoundtofinish
-
- @PlaySoundFile Abb20a02.wav
- @Animation FranklinRaiseKey,FranklinWaveKey,FranklinWaveKey,FranklinWaveKey,FranklinLowerKey
- @Waitforsoundtofinish
-
- @prompt
-
-
- @PlaySoundFile Abb20a03.wav
-
- @AtGraphic 198,99
- @picture coulback.bmp
- @AtGraphic 212,107
- @createanimate charge,2-3-1-,0,4,200,false
- @AtGraphic 348,206
- @createanimate seconds,amc,0,10,80,false
- @startanimate charge,true
- @startanimate seconds,true
-
- @Animation FranklinRaiseKey,FranklinWaveKey,FranklinWaveKey,FranklinWaveKey,FranklinLowerKey
- @At 155,267
- Current = the amount of charge passing a point in 1 second.
-
- @wait 2
- @At 192,292
- So: #b1 Amp = 1 coulomb per second#b
- @Animation FranklinRaiseKey,FranklinWaveKey,FranklinWaveKey,FranklinWaveKey,FranklinLowerKey
-
- @Wait 5
-
- @startanimate charge,false
- @startanimate seconds,false
-
-
- @Prompt
-
- @AtGraphic 128,312
- @Picture abb20a02.bmp
-
- '@At 132,328
- '#<current = #>#uc#^harge#u #b#<I =#> #^#uQ#u#b
- '#ttime #b#t t#b
- @PlaySoundFile Abb20a04.wav
- @Animation FranklinRaiseKey,FranklinWaveKey,FranklinWaveKey,FranklinWaveKey,FranklinLowerKey
- @Waitforsoundtofinish
-
-
- @Prompt
-
- '@At 370,334
- 'charge = current ╫ time #bQ = It#b
- @AtGraphic 356,323
- @Picture abb20a03.bmp
-
- @PlaySoundFile Abb20a05.wav
- @Animation FranklinRaiseKey,FranklinWaveKey,FranklinWaveKey,FranklinWaveKey,FranklinLowerKey
- @Waitforsoundtofinish
-
- @Waitforsoundtofinish
- @Enable Forward
- @At 365,370
- #b#crClick on Forward to move on.